home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2001 December / december_2001.iso / Internet Programs / HTML Webmaster 2.0 / _SETUP.1 / Choose Record.cod < prev    next >
Encoding:
Text File  |  2001-03-23  |  276 b   |  8 lines
  1.  
  2. Sub ChooseRecord(sTable, sField, sWhat)
  3. set rs=Server.CreateObject("ADODB.recordset")
  4. sqlstmt = "SELECT * FROM " & stable & " WHERE " & sfield & " = " & "'" & sWhat & "'"
  5. 'rs.CursorType = adOpenStatic
  6. rs.open sqlstmt, connectme, adOpenStatic, adLockOptimistic
  7. End Sub
  8.